home *** CD-ROM | disk | FTP | other *** search
/ Data Base of the Video Yearbook 1995 / Data Base of the Video Yearbook 1995 - Disc 1.iso / cosmos / monthw.dir / 00010.ls < prev    next >
Encoding:
Text File  |  1995-12-21  |  249 b   |  14 lines
  1. on exitFrame
  2.   global numb, tuki, mydatebase, monthdata
  3.   puppetSound(0)
  4.   puppetSound("low2")
  5.   set numb to EMPTY
  6.   if (monthdata & EMPTY) = EMPTY then
  7.     set tuki to 1
  8.     searchdata(1)
  9.   else
  10.     searchdata(tuki)
  11.     go("M" & tuki)
  12.   end if
  13. end
  14.